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ABSTRACT 


THE RPLIC DISKLESS DIAGNOSTIC EXERCISES THE RPLIC ' | 


doped iil Rm 


mies WHICH S + al THE SIL SING BETWEEN 


1S" ySED TO. “ar MIME SHITCHES 





noha ob ON THE ‘RPLIC AND 
REQUIREMENTS 


EQUIPMENT 


TANDARD POP-11 CONF IGURAT 


IGURATI DISK CONTROLLER. 
OR MORE RPO3 DISK DRIVE 


ON RP1iC 
S (SWITCH TEST ONLY). 


STORAGE 
PROGRAM REQUIRES 4K OF STORAGE. 


PRELIMINARY PROGRAMS 


- NONE. | 


LOADING PROCEDURE 
USE STANDARD PROCEDURE FOR ABS TAPE. 


STARTING PROCEDURE 


CONTROL SWITCH SETTINGS 
SEE SECTION 5.1.1. 
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' PAGE 4 
140 
14 4.2 STARTING ADDRESS 
143 THE PROGRAM MAY BE STARTED AT ONE OF TWO LOCATIONS. 
145 1. STARTING ADDRESS 200. RUNS THE DISKLESS 
14$ DIAGNOSTIC. THE RPIIC MUST HAVE THE 
147 RAIN TENANCE WITCH ENABLED. IF A DRIVE 1 ON 
THE SYSTEM, 31 BE POWERED 1POWN, AND CIRCUIT 
BS TGNAL ft a OFF 
2. STARTING SS 250 THE RP1LIC/RPO3 SWITCH 
EST. AT LEAST ONE DRIVE MUST BE ON LINE. 


4.3 PROGRAMS AND/OR OPERATOR ACTION 


1. LOAD THE PROGRAM INTO MEMORY USING THE ABS 
LOADER. 


@. LOAD DESIRED STARTING ADDRESS. 

3. SET SWITCHES (SEE SECTION 5.1.1). 

4. PRESS START. 

Ss. It IF RUNNING TH THE oa: ST THE PROGRAM WIL 

Seon be AND THEN TYP 

“END OF E Pass I WILL TE _THE 
PASS GRTIRUE LO re" NG. AFTER EACH 
100 passes THE TYPED OUT. 


6. Ma RUNNING THE SWITCH TEST, THE PROGRAM TYPES 
oe ST COMPLETE WHEN FINISHED AND THEN HALTS. 


5.0 OPERATING PROCEDURE 


5.1 OPERATIONAL SWITCH SETTINGS 


AFTER LOADING THE STARTING ADDRESS, SELECT THE 
DESIRED SWITCHES. 


PRESB Sa Noll Jon Soe onc Re Soe ORCA sé 
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187 PAGE S 
188 : 

183 | 

190 S.1.1 SWITCH SETTINGS ARE: 

: 1$3 : SW«15>21 ..... HALT ON ERROR 

ec SWi14>s] ..... LOOP ON ERROR 

19% SWi13>21 ..... INHIBIT PRINTOUT 

138 GH412> occ NOT USED 
200 SW<1l>2I ..... RING BELL ON ERROR 
202 
203 
204 S.2 SUBROUTINE ABSTRACTS 
206 
207 
ro8 S.2.1 SCOPE | 

10 THIS SUBROUT TINE "FeouiD IS PLACED AT THE ENO, OF ‘OF gRAcH 
sie PRROR WHENEVER AH ERROR TS DETECTED, By ERROR FLAG 
ets 1S <2 2 aie ht FLAG is ogEBted ED THE SCOPE ROUTING ROUTINE 
215 WILL [bob Bakk K AND REPER rie adh te. oistne THE ALISING THE 
216 ERROR. PRIOR T 0 EACH SCOPE OOP _BOORESS 1S 
317 MOVED INTO LOCATION: LAD. COnGE he" PROGRAM STARTS 
218 LOOPING ON AN ERROR. IT WILL CONTINUE LOOPING EVEN 
219 THOUGH THE ERROR ny BE INTERMITTENT. TO GO OUT OF 
220 THE LOOP RESET SW<1 
221 
223 # 
ect S.2.2 HLT . x 
226 THIS ROUTINE IS ENTERED UPON DETECTION GF AN ERROR. 
227 IT an Type THE PC THE ERROR AND ADDITIONAL 
228 ERROR INFORMATION. THIS ROUTINE TEST FOR HALT “ON 
229 ERROR, INHIBIT TYPEOUTS NG THE BELL. IT ALSO 
230 SETS THE ERROR FLAG USED BY THE SCOPE ROU Fine: 


S.2.3 TRAP CATCHER 


A”.+2" - “HALT” SEQUENCE IS REPEATED FROM 0-776 TO 
CATCH ANY UNEXPECTED TRAPS. THUS ANY UNEXPECTED 
TRAPS OR INTERRUPTS WILL HALT AT THE VECTOR +e. 


CHS BOMBERS 


6.0 ERRORS 


— TE = a ee ew > —+—~ - oe 
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PAGE 6 
WHEN ERRORS ARE ENCOUNTERED, THE ADDRESS OF THE 
ERROR ALONG WITH THE CONTENTS OF RPDS RPER AND RPCS . 


Ma 3 BY tea THE 

INFORMATION CAN BE FOUND REGARDING THE CAUSE OF T 
ERROR IN THE sate LEA nen N_ APP ADD 
INFORMATION ‘9. Ayre SUC 

rep iVER RESULTS OF AN OPERATION. ALL 1 
IS IN OCTAL. 


ERROR MESSAGE FORMAT 
PC OF FAILURE 
TENTS OF RPDS 


= CON 
= CONTENTS OF RPER 
= CONTENTS OF RPCS 


RESTRICTIONS 
NONE. 


-MISCELLANEOUS 


EXECUTION TIME 


THE PROGRAM WILL MAKE 100 TTGRATIONS THRU THE 
DISKLESS TEST TO COMPLETE ONE PASS. AT THE END OF 
EACH PASS, THE PASS COUNT IS 


TYPED OUT AND THE 
PROGRAM RONTIRUES LOOPING. 


STACK POINTER 
STACK IS INITIALLY SET TO SOO. 


PROGRAM DESCRIPTION 


DISKLESS TEST 


THES TEST UTILIZES THE RP1I1C 
TO CHECK THE LOGICAL 
GU a REGISTERS SI 
BETWEEN THE RP1IC AND 


z 
ae 


E_ REGISTERS 
THE RP1IC. THE 
SIGNALS PASSING 
TQ RUN THIS TEST 


co----o- err" 


RP11C OISKLESS DIAGNOSTIC 
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300 
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THE RP11C MAINTENANCE SWITCH MUST BE ENABLED. IF A 
ORIVE EXISTS, IT MUST BE POWERED DOWN AND CIRCUIT 


RP11C DISKLESS DIAGNOSTIC MACY11 27(732) 16-SEP-76 15:23 PAGE 8 
DZRPAD. MOL 
301 PAGE 7 
AKER #1 LOCATED JUST TO THE RIGHT OF THE DRIVES’S 
BOTCNAL TH" “CABLECMUST BE TURNED OFF. } 
484 


9.2 SWITCH TEST 


THIS TEST FUNCTIONALLY CHECKS THE RESPONSES OF THE 
SWITCHES FOUND ON THE RP11C AND THE RPOS3. 


Se ee ahs 


vA 


WWIWIWlIWtIGIG) 
ONOWUI£ UTE 


Lie ME 
ST MC,MO,CND 


4 
=p 


Jel “TITLE FRONT END 
ace : COPYRIGHT 1972,1973, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 
ase sCONTAINS DEFINITIONS, REGISTER ASSIGNMENTS AND MACRO CALLS 
3c6b *GENERAL REGISTER ASSIGNMENTS 
327 RO=%0 
328 R1=%1 
3293 Re=%2 
330 R3=%3 
331 R4Y=%4 
332 RS=7 
333 SP=% 
sa PC=% 
336 sSTATUS REGISTER (PSW) BIT ASSIGNMENTS 
337 C=1 °C BIT 
538 V= -V BIT 

- @= °Z BIT 
ay vee iN au 
Sup AT7=340 t PRTORITY LEVEL 7 
343 PRI6= *PRIORITY LEVEL §& 
a pretest *PRIORITY LEVEL 5 

PRI4= *PRIORITY L 4 

346 PRI3=140 *PRIORITY LEVEL 3 
347 PRI2=100 sPRIORITY LEVEL 2 
Oy PRI1=40 sPRIORITY LEVEL 1 
350 sVECTOR ADDRESSES , | 
351 ERRVEC=4 sERROR VECTOR 
352 RESVEC=1 sRESERVED INST VECTOR 
353 TBITVEC=14 -T BIT VECTOR 
354 IOTVEC= -I10T T VECTOR 
355 PFVEC=24 -POWER FAIL VECTOR 
356 EMTVEC=30 ' -sEMT VECT 





wre ee oe ee =_-—lUcUhc Or 
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DZRPAD. MO] 
74 000034 TRAPVEC=34 s TRAP VECTOR 
3 beceielbe St- f SES 
177 *PROCESSOR STATUS REGISTER 
1 l asic cees ; KEYBOARD CSR 
362 177562 elon BUFFER 
on oo eee Test traes TELEPRINT ve TER CSR 
3c l =155E58 CONSOLE Suit SWITCH HW REGISTER 
23 177570 BTSPLAY=2177570 ; CONSOLE DISPLAY REGISTER 
368 ‘. s INITIAL STACK POINTER 
22 000500 STKPTR=S00 sPROGRAM STACK POINTER 
371 sBIT ASSIGNMENTS * 
a: etna 
374 020000 Bt 3-20000 
375 010000 B12=10000 
376 004000 Shee 
377 tte 810= 
378 001 89=1000 
3793 000400 B8=400 
380 000200 87= 
381 000100 B6=100 
382 000040 BS=40 
383 000020 = 
384 000010 B3=10 
-385 000004 Be= 
386 000002 l=2 
0 000001 =1 
cor MEMORY MANAGEMENT REGISTER ASSIGNMENTS 
331 7e SRO=1 
332 172340 KIPARG=172340 
333 172342 KIPARI=17234e 
394 KIPAR2=172344 
395 172346 KIPARS=172346 
3% 172350 KIPARY=172350 
337 172352 KIPARS=1723S2 
338 172354 KIPARG=172354 
339 172356 KIPAR7=1723S6 
400 172300 KIPORO=172300 
401 172302 KIPOR1=17230e 
402 172304 KIPDR2=172304 
403 172306 KIPDR3=172306 
4WOY 172310 KIPDR4=172310 
40S 172312 KIPDORS=17231le - 
406 172314 KIPOR6=172314 
407 172316 KIPOR7=172316 
408 000005 =6 
4093 000000 UP=00 
tif ‘ 
412 INSTRUCTION EQUATES 


— 
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104000 
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as — 


HLT=TRAP sHLT IS A TRAP TO THE ERROR ROUTINE 
SCOPE=EMT ;SCOPE IS AN EMT TRAP 


; INDEX OF eos 


v 
rs) 
_— 
z 
~ 


; INDEX OF CALLS 
SCOPE 


B55 38e— 


.LIST ME 
HOV uSTART, PC ;GO TO START OF TEST 
tent: 0 a CONTAINS PASS COUNT 
‘PROGRAM TRACE 
“SCOPE (EMT) SERVICE ROUTINE 
‘THIS ROUTINE WILL LOOP IE AN ERROR OCCURED AND 


;LOOP ON ERROR SWITCH IS SET (BIT 14). IF LOOPING IS INDICATED 
‘THE CONTENTS OF “LAD” EQUAL THE LOOP ADDRESS. IN ORDER 


501 


001 
001012 


ba Pew pe fe Pee oe 


ps ba» f= 9 fhe P+ pes fe few 


InSe 


So0000565 Sesceesss 888sss 
2RSc 


-— >— 6 + = bb bb 
e+b=6-b-CD 

— 

| om 


RRLRGsEoe FERRERS 
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0 LOOP ON ona Ae 7 OF te ag tes REGISTER MUST BE SET 


ep iiatidaiaict 


b= 2 b— b= os Oe 
WOnNwDUI cue 


PURprnee ence emcees 


patti 


eassReRssaRsessesss 
NUBaSSgnaassneeNNSS 


OLO 


i OCaT CATING AN ERROR Ae 
* LOOP ION NE at WIE C seth iN L SWITCH 14 I PARED. 
032737 O40000 177570 SCOPES: BIT pt Sao sLOOP ON ERROR? 
ite 000220 aE RRFLG rs RROR? 
Bb1 083 i ee is AVES 
005067 000212 CLR ERRFLG ;RESET ERROR CONDITION 
BETTE 177746 MOV LAD, (SP) MODIFY RETURN ADDRESS’ 
noo00e RT: % 
. sROUTINE TO SAVE REGISTERS ON THE STACK. 
‘CALLED BY SAVE MACRO 
012667 o00020 MOV (SP)+. 1 -SAVE RETURN PC 
010546 ,~€SP) 
010446 -(SP) 
010346 MOV R3;-(SP) 
010246 MOV Re, -(SP) 
010146 MOV R1.-(SP) 
010046 RO; -(SP) 
016707 oo0000 1$,PC - RETURN 
000000 1$: 0 -CONTAINS RETURN ADDRESS 
; ROUTINE TO RESTORE REGISTERS SAVED ON THE STACK 
“CALLED BY REST MACRO 
012667 o90020 ST$: MOV (SP)+, 1 sSAVE RETURN PC 
012600 MOV (SP)+,RO 
012601 MOV (SP)+-R1 
012602 MOV (SP)+,Re 
012603 MOV (SP)+,R3 
012604 MOV (SP)+°R4 
012605 MOV (SP)+,RS 
016707 oo0000 MOV 1$,PC » RETURN 
000 0 /3CONTRINS RETURN ADDR 
RROR SERVICE ROUTINE CALLED LT 
{THIS ROUTINE WILL HALT ON ERROR THE BELL, AND 
* TRANSFER CONTROL TO A USER SUPPLIED R ROUTINE IF SPECIFIED 
005737 177570 ERROR: TST JaSWR T ON ERROR? 
100001 BPL t BRANCH IF NO 
000000 HALT 
032737 OO4000 177570 3S: BIT #811, 28SWR *RING THE BELL? 
001 , BEQ 1$ : BRANCH 
DO4SE/ 000144 ISR RS, PRNTFS “FORCE PRINT THE MESSAGE 
032737 o20000 177570 1S: BIT #813, J#SWR ;SKIP TYPEOUT? 
; $67 000110 ISR RS, PRINTS t PRINT MESSAGE 
011667 o0006e MOV (6), HLTADS -GET ERROR PC+2 
162767 O0O002 oo005 SUB #2. HLTADS :M 
117767 000050 o00044 MOVB  @HLTADS,HLTCTS ;SAVE HLT ARGUEMENT 
016767 oOo00042 O00356 MOV TADS, TTY 
004767 000134 JSR p PRIATR TYPE LOCATION WITH LEADING ZEROS 
004767 012100 : JSR PC’ M -GO TO USER ERROR ROUTINE 
005737 177570 2S: TST Sean ‘HALT ON ERROR? 
100001 BPL US ‘BRANCH IF NO 


001232 


PRE INT 


WIG) 
— 
ornicd 


SS88SSSSSSSS88S SSSS88SSSS8S8ESSS 


yee em A fe bh be fe he pO hm pe he be Re P= OF Bs 2 Ps = 2 B+ fp = BP bo Bs Be 


5¢ 


POMPRETRESAAR TRONS SSPE US 


001442 


S500 
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MO1 


HALT 
seats 100000 O00006 4S: BIS #815, ERRFLG -SET ERROR FLAG 
005267 000010 Ine ERRORS : UPDATE ERROR COUNTER 
Bb0000 RRFLG: 0 
000000 HLTCTS: 0 
000000 HLTADS: 9 -PC OF ERROR 
990009 : ERRORS: 0 “ERROR. COUNT . 

BELL: .ASCIZ . 
OO5015 005015 O41520 ERRPC: .ASCIZ C18) 12> 15) 12) Pes ’ 
wares q EVEN 
‘ -THIS ROUTINE WILL PRINT AN ASCIZ PESSACE. 
. : THE MESSAGE MUST TERMINATE IN O 
020000 177570 PRINTS: BIT #813, SUR - INHIBIT TYPEOUTS? 
ate BEQ PRNTES : 
062705 900002 ADD #2,R5 :UPDATE RETURN ADDR 
o002e05 Cs RTS RS 3 
105737 177564 PRNTF$: TSTB a#TPS :WAIT FOR PRINTER TO FINISH 
100375 BPL 4 ; 
010546 MOV RS,-(SP) 
062716 oo0002 ADD #2° (SP sADJUST RETURN PC 
011505 MOV (RS),R ‘GET MESSAGE ADDR 
105715 1S: TSTB —s_- (RS) -CHECK FOR TERMINATOR 
001002 BNE 2$ 
012605 NOV (SP)+,RS -GET RETURN ADDR 
112537 177566 2S: MOVB (RS)+, 24TPB PRINT CHARACTER 
105737 177564 TSTB) 3s DNTPS -WAIT TILL DONE 
100375 BPL - a 
000766 BR is 
- THIS ROUTINE TYPES A LOCATION IN OCTAL 

032737 O20000 177570 PRINTR: BIT g 4 - INHIBIT TYPEOUT? 
001406 BEG PRINTA *BRANCH IF NO 
032737 Oe20000 177570 PRINTS: BIT #813 JaSWR : INHIBIT TYPEOUT? 
001405 BEG PR RINTB ‘BRANCH IF NO 
112767 000001 000140 PRINTA: HOVE #1, .PR sS5T ZERO FILL SWITCH 
N05067 000132 PRINTB: CLR “PR : SUPPRESS LEADING ZEROS 
112767 177772 00125 MOVB a6, .PR+1 -SET COUNT 
010446 .PTIT: MOV (SP) : SAVE 
012704 O01S40 MOV g TpR+2. RY :SET POINTER TO FIRST: CHARACTER 
105014. CLRB =: (RY) -CLEAR FIRST BYTE 
000413 BR PRF ‘ROTATE FIRST BIT 
105014 - PRL: CLRB (RY) -CLEAR BYTE OF CHAR 

767 000100 o00i02 BIT #100, .PR -BIT TYPING MODE 
001 BNE . PRF -YES SKIP 2 ROTATES 

167 000120 ROL TTY “ROTATE BIT INTO C 
106114 ROLB  =s-_« (4?) -PACK IT 
006167 o00112 ROL TTY 
106114 ROLB 3s (4) 
006167 000104 “PRF: ROL TTY 
106114 ROLB  =s_« (4) 
105714 - TSTB Ss (4) :IS IT ZERO 


FRONT 
OZRPAD. MOL 
2 aS 
ne 
501474 
ce Baie 
= 001502 
nt 
S30 Bolele 
S31 001S2e 
S92 001524 
ape 
Bec oles 
S96 001536 
S37 001562 
S38 001564 
S39 001564 
600 001570 
601 001574 
602 001606 
603 001604 
604 001606 
605 001610 
poe 00161le 
001614 
608 001616 
609 001620 
610 001624 
611 001626 
Ble 001632 
613 001634 
614 OO1640 
615 O0l64e 
616 OO1644 
Hy Bie 
B18 Oolese 
620 001660 
621 001662 
Bee 001666 
623 00167e 
624 001676 
625 
626 001700 
627 001702 
628 001704 
6239 001706 
630 Rite 
ne 
pal Wt odR 
633 001724 
634 0017 
635 0017 
636 001736 
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RS, PRINTS 
(SP)+,R4 
C 
12. 


PC. SAVES 
LOANUM, RO 


STAPUTS R3 


sinPUTS#20, R3 
38177560 


aul77562, » (3) 
#177, (3) 


NO1. 


sGET CHAR 


Set FIL 
cK, i NSUTTCH 


s MAKE ING ASCIZ sete 


hai BUFFER , 
KIP IF NOT 


ONE ZERO 
NULL TERR INATO® 
‘PRINT MESSAGE 


Y 
;RESTORE R4 


; SAVE THE ti 


+ SET SHIFT COUNT 


;SHIFT RO LEFT AND 
‘ROTATE CARRY INTO R1 AND 
sROTATE CARRY INTO Re 
:CHECK FOR DONE 
;ADD # TO MAKE X 129 
i PROPOGATE CARRY 

sADD # TO MAKE X 129 
: PROPOGATE CARRY 


;sPROPOGATE CARRY 
:PROPOGATE CARRY 


\s 


sRESTORE THE REGISTERS  ,° 


;SAVE R3 
:GET BUFFER ADDR 
; BUFFER FULL? 
sYES..TYPE ? 
sWAIT FOR A CHAR 


sGET RID OF JUNK 
-IS IT A RUBOUT? 


FRONT END 
DIRPAD. MOL 
837 O017%e 
$38 1744 
1744 
ae 
aa 
gx pt seS 
843 O00i762 
cade pai cee 
645 001 
54$ 001774 
&47 001 
48 
649 002006 
650 002010 
651 O02e0le 
&S2 
653 002014 
654 902054 
655 002060 
BSS 
657 
653 
a 
EE] DOneS 
G62 902066 
663 002072 
664 002074 
665 002100 
666 002102 
$67 002104 
668 002106 
669 002110 
670 002114 
671 O0elee 
672 002126 
673 002130 
674 002134 
675 pete 
676 144 
677 002152 
678 O0ciSé 
679 002160 
680 002164 
681 602170 
682 002174 
683 O02202 
684 02206 
685 02212 
686 002214 
687 O02220 
688 002226 
689 00e232 
£90 00223 
691 002240 
632 02244 


e7 (732) 


177314 
177562 
177564 
000015 
177777 
177256 


009012 


176750 
000242 


002014 


8 Besse Beece Bee 
Fu S2hRae Piedat Lue 


5 
=] 
~F—- #$£x§-— 


a Si 
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4§: 


177S66 35: 


009212 
000 162 
000132 


000106 


INPUTS: 
READMS: 


-READLS: 


BNE 


- BLKW 
ASCI 
-ASCI 


3$ 


RS,PRINTS 


BO0e 


$ 
4eTKB, aeTPB 
aeTPs 


4 
#15,(3)+¢ 
es 


mt SF). 
RS, PRINTS 


(6)+,R3 
PC 


20 
IS le 


(12> 


sSKIP IF NO 
sPRINT MESSAGE 
tELERR ge AND START OVER 


;WAIT FOR +i 

;CHECK FOR RETURN 
; LOOP IF’NOT RETURN 
sREMOVE THE RETURN 
;PRINT MESSAGE 


;RESTORE R3 
; RETURN 


; TAKE THE CONTENTS OF THE ITY INPUT BUFFER AND 
;PACK THEM INTO ONE WORD TC CREATE AN OCTAL NUMBER 


PACKS: 


JSR PC SAVES 
CLR NUMS 
: CLR RO 
2s: TSTB INPUTS(RO) 
Q ng 
INC RO 
39 2$ 
1$: DEC RO 
JSR PC PACS 
MOV PKS NUMS 
JSR PC, PACS 
CLC 
ROL PKS 
ROL PKS 
RO PKs 
BI PKS, NUMS 
JSR PC, PACS 
CLC 
SWAB =s«éPKS 
ROR PK§ 
Bre PKS, NUMS 
y PACS 
CLC 
ROL KS 


;SAVE THE REGISTERS 


CHAR 
T_ CHAR 
CHAR 


eae 


;PACK SECCND CHAR 
;GET OCTAL CHAR 


sPACK THIRD a 


AL 


;PACK FOURTH CHAR 
GET OCT 











C0e 
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26 
oo 


ag Nh a 
Ph 


Ea reeT. 
@ B85 


BBSs 


Se | 
— 
-(> 


K 

e 

PKS sPACK FIFTH CHAR 
PREXIS 

Ae sMODIFY STACK 
PC,RESTS “RESTORE THE REGISTERS 
PC sEXIT 
RO 
PKEX$ 


INPUT$(RO),PK$ ;GET INPUT CHAR 
| hala ;CLEAR UNWANTED BITS 


RP11C DISKLESS DIAGNOSTIC 
OZRPAD. P11 


766 
76 


7 





011102 


910430 


_———_— = ——_— ee ee * 
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011110 


10752 
10744 
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~TITLE RPLIC DISKLESS DIAGNOSTIC 
BACK=. 


. MOV eSWTST, PC 
VECTOR=254 
STATUS=2eS6 
START: MOV TKPTR, SP 
CLR PASSCT 
LOOP: CLR CNT 
JSR , INIT 


; TEST LOADING AND READING OF 
S REGISTERS USING A PATTERN 
SWALKING 1°S (1,2,4,10 E 


;RPER-ERROR REGISTER 


ERBST: 
JSR RS BITST 
.WORD 1766 
-WORD 1767 
HLT 
RTS pC 
2s: MOV #176656,98176712° 
RESET 
T I 98176712 
V 3176712, RECS 
L EXPS 
HLT +3. 
1S: MOV 82S ,LAD 
ERGO av ae IRPER 
NOY oe SRP ES 
_ MOV SRPER, RECS 
TSI RECS 
Q 1 
CLR EXPS 
1S: MBY SERCO, LAD 
SCOPE 
‘RPCS-CONTROL STATUS REGISTER 
CSB8T: JSR RS .BITST 
. WORD 
“WORD =:176714 
HLT 43 
RTS pc 
2s: MOV #37576, JRPCS 
noe : aRPC C$ 
BIC a7 REC ; 
BEQ 


OF 
TC) AL 


ine ee REGISTER 


TER=RPER 
sTACeBRECT DATA RECEIVED FROM RPER 
EXIT FROM ERROR C 
. SE  WASK BITS IN THE REGISTER 
>CLEAR REGISTER RPER 
jP10 RESET CLEAR THE REGISTER 
‘BRANCH {F YES 


sREGISTER RPER DID NOT CLEAR WITH RESET 
SET UP ERROR LOOP ADOR 
T AL ITS IN RPER 
PE aR At (eee 8 
; GET CONTENTS OF RPER 
0 GO CLEAR RP 


SETUP ERROR LOOP_ADOR 


LOOP ON TEST IF ERROR 


s TEST BITS IN REGISTER 


SREGIS R=RPC 
b INCORRECT DATA RECEIVED FROM RPCS 


sx 6] i: 1h REGISTER 


cL 
ee IF RESULT IS ZERO 


RP1IC DISKLESS DIAGNOSTIC 
DZRPAD 


becTestTeslecteclecleslesles}es) 
0 0 b= b— 0 bs 0 be 
Won £wMuUeH-O 


SEee 


SOUR EDC SSE SARL ESS SRRS ERB IAI ee 


SS eee Bee 


? 


at, | aed 
A) 
| 


a 


N 


—-Or-OO 
o- 
S 
™“ 


> 
8 


SEY 


“ 


010734 


000200 


010210 


177777 
176716 


76716 
1064e 


0026 le 


010132 


177777 
176720 


176720 
010564 


002670 


010054 


000777 
176722 


© MACYLL 27(732) 


011052 


176716 


010650 


176130 


176720 


010S7e 


176052 


176722 
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CLR EXPS 
T : ‘RESET DID NOT CLEAR RPCS 
1S: IT 487 , ORPCS :IS READY SET? 
HLT sREADY NOT N RPCS AFTER RESET 
3S: Oy #2$, LAD :SETUP LOOP 
SCOPE 
:RPWC-WORD COUNT REGISTER 
RPBT: 
JSR RS, BITST ;TEST BITS IN REGISTER 
.WORD 177777 =177777 
-WORD 176716 REGISTER =RPWC 
HLT +3 - INCORRECT DATA RECEIVED FROM RPWC 
RTS pc “EXIT FROM ERROR C 
2s: MOV #177777, a8176716° -SET MASK BITS IN THE REGISTER 
RESET sCLEAR REGISTER RPWC 
TST 98176716 “DID RESET CLEAR THE REGISTER 
BEQ 1 ‘BRANCH IF YE 
MOV 98176716, RECS 
CLR EXPS 
HLT +3 sREGISTER RPWC DID NOT CLEAR WITH RESET 
1S: MOV #2$, LAD -SET UP ERROR LOOP ADDR 
SCOPE 
-RPBA- BUS ADDRESS REGISTER 
ete RS,BITST :TEST BITS IN REGISTER 
“TORE 176920 
HL +3 REGIS TERRPRR RECEIVED FROM RPBA 
RTS pc EXIT ERROR 
2$: MOV #177777, a"l76720° -SET MASK BITS IN THE REGISTER 
RESET :CLEAR REGISTER RPBA 
TST 98176720 “DID RESET CLEAR THE REGISTER 
9 1 sBRANCH IF YE 
MOV 98176720, RECS 
CLR EXPS 
HLT +3 ‘REGISTER RPBA DID NOT CLEAR WITH RESET 
1S: MOV 82$, LAD -SET UP ERROR LOOP ADDR 
SCOPE 
sRPCA-CYLINDER ADDRESS REGISTER 
CART: SRR BITST ;TEST BITS IN REGISTER 
.WORD 77? arabes 
“WORD 176722 PECTS TERERPCA 
HLT +3 _ ZINCORRECT DATA RECEIVED FROM RPCA 
RTS pC :E'.IT FROM cab 
2S: MOV 8777, d8176722 MASK KB S IN THE REGISTER 
RESET : CLEAR neereR RPC 
TS 38176722 SET CLEAR THE REGISTER 


~ 
o~ 


ataiatatatad 


SISTER VLE | 


176722 
010506 


002746 


? 007776 


_—.-- o- eee owe a+ *- 
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010814 


178774 


010614 


010444 
010436 


178714 


175666 
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BEQ 1$ -BRANCH IF YES 
MOV 38176722, RECS 
CLR EXPS 
HL +3 ‘REGISTER RPCA DID NOT CLEAR WITH RESET 
1S: MOV #2$, LAD :SET UP ERROR LOOP ADDR 
SCOPE 
-RPDA-DISK ADDRESS REGISTER 
DABT: JSR RS, BITST ;TEST BITS IN REGISTER 
.WORD 17417 =17417 
-WORD 176724 PREGIS — 
HiT $3 | ‘INCORRECT DATA RECEIVED FROM RPDA 
: #17417 TS IN 
a: BL, Hirurawon EO 
NOY aRPOA BECS <GET CONTENTS OF RPOR 
BE ee ; sCLEAR UNANTED BITS 15 ZERO 
HLT +3 DID NOT CLEAR RPOA 
18: MOV #2$, LAD RS air PaBP ADOR 
SCOPE 
sWC REGIS DaTA Test - AF MAY NOT TAS A 
<DROP OR REL IN ROR TYPOUT, TH INDICATES THe f THE REGISTER 
=DOES NOT WITH THE PROPER DA tT BNOUGH | 
RAPWC: JSR RS.RAPBIS 
; i7erie REG = RPWC 
HL S INCORRECT DATA FROM RPWC 
RTS pe EXIT FROM ERROR CALL 
CLR 3#176716 sCLEAR ROME 
HOV BRAPWC, LAD LOOPING ON ERROR, SETUP FOR THIS TEST 
-BA REGISTER RAPID DATA TEST - A FAIL URE HERE T REPORT AS 
-OR PICKED BIT(S) IN ERROR TYPOUT, TH nOcaTES SHAT HE REGISTER 
*DOES NOT SETTLE WITH THE PROPER DATA F 
RAPBA: JSR RAPBIS 
HLT +3 iA COR CT = ORTE FROM RPBA 
RTS pC * RETURN EROR ERROR CALL i 
CLR 98176720 -CLE i 
MOV #RAPBA, LAD -TF LOOPING ON ERROR, SETUP FOR THIS TEST 
TEST T THE ABILITY ABILITY OF eae a Ene RECS cS TO CLEAR TH THE CONTROLLER 
RESET c SHOULD BUD GENERATE T 
RESWC: MOV 
AR THE RP 
JSR ft A THE APLC 11C 





MOV 
TST ;DID INIT L CLEAR RPC? 


RECS ° 


ao ~~ ee — 
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“oO 
pee 
ea 


ae; 010306 BRR bog RT EOR EXP Ce RESULT 
4 HLT +3 *INIT L DIO NOT CL 
003200 12767 003144 175574 1S: MOV #RESWC, LAD 
003206 © 104000 8 SCOPE 


ad 


RP11C DISKLESS DIAGNOSTI 
OZRPAD.P11 





8 Be 


BES SRE ON 


fe 


MOO OWODONOwOWwOWwo 
= b= 0 
WOnNCUI£UITUE- © 


LE S008 088s Oo OKO GOS 


Bian ctshs 


##ERPDS 


w—_—_—- ——_——— o~oew = - 
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010432 
010374 


175534 


010376 


O103a2 


178472 
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~SBTTL ###RPDS FUNCTION TEST### 
;TEST THE SETTING OF SELECTED UNIT READY 


~ a See 
BIS #814, ORPM3 SET MAINT UNIT READY 
IT #815, RPDS ‘DID E TED UNIT READY SET? 
T SELECTED UNIT READY NOT SET 
1$ V #O0SF1,LAD 


OSFe: 


B #814, JRPM3 ;SET MAINT UNIT READY 
BIS ate 3 LEAR MAINT UNIT Y 
BFo t ; SELECTED UNIT Y CLEAR? 
HLT ;SELECTED UNIT READY DID NOT CLEAR 
1$: MOV #OSFe, LAD 
: SCOPE 


; TEST THE SETTING OF SEEK INCOMPLETE 


OSF4Y: RESET 
CLR IRPM3 
CLR IRPDS 
BIS #810, RPMS :SET MAINT. SEEK INCOMPLETE 
B #811, @RPOS ‘DID SEEK INCOMPLETE SET? 
ny | ad -SEEK INCOMPLETE DID NOT SET 
(18: BIT #80, 2RPER sDID DISK ERROR SET? 
HLT a “DISK ERROR DID NOT SET AFTER SUSI 
3S: BIT #814, ORPCS -DI ERROR SET? . 
BNE 4 BRANCH IF SET . 
HLT *HARD ERROR DID NOT SET AFTER SUSI 
4S: IT #815, IRPCS :DID ERROR SET? 
BNE | : H IF SET 
HLT *ERROR DID NOT SET AFTER SUSI 
2S: MOV #DSF4, LAD 
SCOPE 
sTEST SEEK INCOMPLETE TO CLEAR 
OSFS: CLR IRPM3 
BIS #810, JRPM3 -SET MAINT SEEK INCOMPLETE 
BIC #810, ORPM3 ‘CLEAR 


RP11C DISKLESS DIAGNOSTIC 
OZRPAD.P11 ##ERPDS FUNCTION TEST#H# 


341 





Pep Rit At Lid i RE RERPRARE LCA ad dota uauladuuk tea ee 2 


A 


cen ay Ls 


ce Ree 


oes 


032777 


012767 003420 
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175316 


007574 
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BIT + eit sDID SEEK INCOMPLETE CLEAR? 
I BBENCH LE AStESE orp NOT CLEAR 
1S: a #OSFS,LAD 


;TEST THE SETTING OF FILE UNSAFE 


DSF7: CLR JRPM3 

Af laws ager mar 

Mi ts, ‘Bio FILE UNSAFE 

HLT sFILE UNSAFE DID NOT SET 
1S: MOV #OSF7, LAD 

SCOPE 


; TEST CLEARING OF FILE UNSAFE 


OSF10: LR IRPM3 
Bre SSB 
BIS #811, ORPMS -SET MAINT FILE UNSAFE 
BIC #811. dRPM3 °C 
BIT #89, ORPDS -TS FILE UNSAFE CLEAR? 
HLT -FILE UNSAFE DID NOT CLEAR 
1S: MOV #D0SF10,LAD 
SCOPE 
-TEST THE SETTING OF WRITE PROTECT 
DSF1l: CLR 
ele if Srp 
eit tee, DS ‘BID WIRYE PROTECT SET? 
HLT sWROTE PROTECT DID NOT SET 
1$: MOV #DSF11,LAD 
SCOPE : 
sTEST THE CLEARING OF WRITE PROTECT 
OSF12: CLR IRPM3 
CLR JRPDS 
BIS #815, RPMS -SET MAINT READ ONLY 
BIC #815; SRPMS 
BIT #88, ORPOS ‘DID WRITE PROTECT CLEAR? 
HLT : sWRITE PROTECT DID NOT CLEAR 
1S: HOV #OSF 12, LAD 


> TEST SETTING OF ATTENTION BITS 


OSF13: MOV #1 EXPS 
CLR Me 


25 s INITIATE ATTENTION BIT PATTERN 


RP11C DISKLESS DIAGNOSTIC MACY11 27(732) 16-SEP-76 15:23 PAGE 23 
OZRPAD.P11 ###RPDS FUNCTION TEST### 


sa haces pierce Oiters pormoe §8=— ANY err gneng chem arrention gyre, 
34 126777 007544 007666 
7 


1000 0037 CMPB «EXP, RPDS + THE ATTEN BIT SET IN RPDS? 
1004 7 Q ‘BRANCH IF OK 
007660 007534 VB DS,RECS 
1003 003752 104401 Ht T +1 sATTENTION BIT DID NOT SET PROPERLY 
ie Sires 108085 003710 175020 1S: HOV #2$, LAD 
l 4 bi 007514 007636 4S: MOV EXPS. IRPDS ;CLEAR ATTENTION BIT 
1007 003772 105777 007632 TSTB = ARPDS ‘DID IT CLEAR 
1008 003776 901401 BEQ 3$ ‘BRANCH IF CL EAR 
1009 1 HLT SATTENTION BIT DID NOT CLEAR 
010 oo4002 012767 003764 174772 3S: MOV #4$, LAD 
O1 19 ) SCOPE 
l 1 } CL 
01 14 16? 007464 ROL EXPS sROTATE PATTERN 
014 oOO4020 032767 OO00400 007456 BIT #88, EXPS ; END OF PATTERN? 
015 00402 001730 BEQ 2§ IF 
016 1 000377 O07616 6S: MOV $377, JRPM2 SET ATTENTION BITS 
017 004036 RESET ae es 
018 oOo4O4G 1 007564 TSTB RPDS sDID RESET CLEAR ATTN BITS? 
019 OO4044 001401 BEQ +3 
OO404E O40 HLT ‘RESET DID NOT CLEAR ATTENTION BITS 
O040S0 012767 OO4030 174724 S$:- - MOV #6$,LAD 
004056 104000 SCOPE 


a 


004060 : 
004084 012777 007562 MOV #377 , JRPM2 -SET ALL ATTENTION BITS 
ISSUE CLEAR RPDS 
sDID ATTENTION BITS REMAIN SET? 
BRANCH IF YES 


005067 | 
117767 007506 007362 MOVE a@RPDS,RECS ;GET BAD DATA 

104403 HL +3 ;ATTENTION BITS CLEARED WITH A ZERO 
Oho e OO4SEO 174646 7S: MOV #8$, LAD 


+ bb b> hb & 2 bo Bb > hs Bs > b> b= ps = Fs hs eH oH RS 


Baaromis win ga 
: 
<3 
: 
3 
3 


e8i 


_——_— —_—- —_———_—— ee me - —- -—_ 
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OZRPAD.P11 ¥¥#RPER FUNCTION TESTES 


tas -SBTTL ##*RPER FUNCTION TEST### 
1036 ‘TEST THE SETTING OF WRITE PROTECT VIOLATION 

1038 004136 o0000S ERF1: RESET 

1039 004140 0S2777 100000 007512 BIS #815, IRPM3 -SET MAINT READ ONLY 

1040 OO4146 012777 177777 007464 MOV #-1. ORPWC 

104. OONISY 112777 Op0003 Oo7use HOVE #3,9RPCS aan pISSUE A WRITE 

Iss Soul) Gbirer Ores RE TR Genenare 9 Tmtne Pues 
{Bue ve Mate BNE i } | 

10468 OO4204 104400 HLT sWRITE VIOLATION DID NOT SET 
1047 o04206 000413 BR 2g 

1049 004210 032777 O40000 OO7416 IS: BIT 8B14, IRPCS sDID HARD ERROR SET AFTER WPV? 
1050 004216 001002 BNE 3$ 

1051 004220 104400 HLT wt -HARD ERROR DID NOT SET AFTER WPV 
1pe5 224 100000 007402 3S: BIT #815, IRPCS *DID ERROR SET AFTER WPV? 

1054 004232 001001 BNE 2g ) 

1055 004234 104400 HLT sERROR DID NOT SET AFTER WPV 
1056 O04236 012767 004136 174536 2S: MOV #ERF1,LAD 

1057 o04244 104900 | SCOPE 

1058 sTEST THE SETTING OF FILE UNSAFE VIOLATION 

1061 OO4e46 ERF2: RESET 

1062 004250 rage wath, 007356 oie | IRPER 

1063 - 004254 777 004000 007376 BIS #811, 2RPM3 -SET MAINT FILE UNSAFE 

1064 ‘Oouebe 012777 177777 007350 MOV = 

1065 270 112777 000003 007336 MOVB #3, ARPCS -ISSUE WRITE 

1066 004276 O12767 064001 007320 MOV #614+813+811+80, TPL 

1067 004304 004767 007252 JSR p *GENERATE 3 TIMING PULSES 

1068 004310 032777 007314 BIT #514, ORPER ‘DID FILE UNSAFE VIOLATION SET? 
1069 316 001002 BNE 1$ | | 
1070 199400 | HL -FILE UNSAFE VIOLATION DID NOT SET 
1072 3 o40000 007302 1S rT oat IRPCS DID HARD ERROR SET AFTER FUV 
4 Witt te Be & 3 5 : 

l 004334 104400 HLT | sHARD ERROR DID NOT SET ATER FUV 
1075 004336 BR 2$ | : 
1076 004340 100000 007266 3%: BIT #815, IRPCS :DID ERROR SET 

1077 004346 001001 BNE 25 

1078 O043S0 104400. HLT . sERROR DID NOT SET 

1079 352 012767 oO4e46 174422 2S: MOV #ERF2,LAD 

1080 360 104000 SCOPE : 

1082 sNON-EXISTENT CYLINDER SHOULD NOT SET WITH LEGAL ADDRESSES 

1084 004362 O0S067 007116 ERF3: CLR EXPS -START AT ADDR O 

1085 O04 767 0071 6 2$:. .. JSR PC, CLAP ‘CLEAR THE CONTROLLER 

1086 72 CLR JRPER 

1087 004376 016777 007102 007240 MOV EXP$, JRPCA sLOAD CYLINDER ADDR 

1088 012777 177777 OO7e26 «C MOV #-1, ORPWC 

1089 904412 012777 O00003 007214 | MOV #3, JRPCS ISSUE A WRITE 


RP11C DISKLESS DIAGNOSTIC MACYLI 27(732) 16-SEP-76 15:23 PAGE 25 
DZRPAD.P11 SEERPER FUNCTION TEST##% | 


930 pousigo 2767 O60001 007176 MOV #8144813+B0, TPL 
1 2b 767 007130 JSR PC T3P GENERATE 3 TIMING PULSES 
038 bowie a 020000 007172 BIT #813, QRPER ‘DID NON-EXISTENT CYLINDER SET? 
powue HLT sNON-EXISTENT CYLINDER SET ON LEGAL ADDR 
174614 JSR RS, PRINTS ‘PRINT MESSAGE ‘ 
096 oo44SO 013757 gi S10 : 
oo44S2 016767 007026 175102 MOV EXPS. TTY 
OO4460 004767 174660 ' JSR PC. PRINTR -TYPE LOCATION WITH LEADING ZEROS 
OON4E4 012767 OO4366 174310 1S: V $ LAD 
004472 104000 SCOPE : 
004474 905267 007004 INC EXPS sUPDATE CYLINDER ADDR 
004500 022767 O00626 006776 CMP #626, EXPS “TS ADDR STILL LEGAL? 
004506 001327 BNE 2 *BRANCH IF YES 
sTEST SETTING OF NON-EXISTENT CYLINDER WITH ILLEGAL CYL ADDR 
004510 004767 008774 ERF4: JSR PC, CLRP sCLEAR THE CONTROLLER 
004514 005077 007112 ~ CLR JRPER 
p04520 016777 006760 007116 MOV EXP§, IRPCA *LOAD CYLINDER ADDR 
004526 012777 177777 007104 MOV #-1. ORPWC 
004534 012777 000003 007072 MOV #3, JRPCS s ISSUE WRITE 
p0454e 12767 060001 007054 MOV #814+B13+B0, TPL 
004550 767 007006 JSR :GENERATE 3 TIMING PULSES 
904554 020000 007050 BIT #813, JRPER “DID NON-EXISTENT CYL SET? 
po4S62 o010le BNE 1$ 
004564 HLT sNON-EXISTENT CYL DID NOT SET 
OO04S6E OO4SE7 174472 JSR RS, PRINTS “PRINT MESSAGE 
004572 013757 MES10 
004574 016767 006704 174760 MOV EXPS$, TTY 
004602 004767 174536 JSR PC, PRINTR - TYPE LOCATION WITH LEADING ZEROS 


1 
1 
1 
1 
1 
1 
l 
1 
1 
1 
1 
1 
1 
1 
l 
1 
1 
l 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
-s 
1 
1 
1 
1 
1 
1 
1 
1 


00041 BR 
Bee G32777 040000 OO701E 1S: BIT sai, recs ;DID HARD ERROR SET AFTER NXC? 


BNE 
004620 104400 HLT sHARD ERROR DID NOT SET 
Souesd | One779 a, OtCS 
004624 100000 cOo7002 3$ BIT #815, 2RPCS :DID ERROR SET AFTER NXC 
004632 001001 BNE 2$ 
OO4E34 D440 T sERROR DID NOT SET 

12767 OO4S10 174136 2S: MOV #ERFY, LAD 
DO04644 104000 SCOPE 
OO4646 ? O06632 INC EXPS -UPDATE CYLINDER ADDR 
O046S2 022767 000700 o06624 CMP #700, EXPS *PATTERN EXCEEDED? 
004660 001313 BNE ERFY 
:NON-EXISTENT TRACK SHOULD NOT SET WITH LEGAL ADDRESSES 

004662 cOoc0s ERFS: RESET 
0046645 005067 006614 CLR EXP sSTARTING TRACK ADDR OF 0 
004670 005077 006752 CLR JRPOA 
004674 004767 006610 ERLS: JSR PC, CLRP :CLEAR THE CONTROLLER 
004700 005077 006726 CLR IRPER 
004704 116777 006574 006736 MOVB § EXP§. ORPDAL sLOAD TRACK ADDRESS 
004712 012777 177777 006720 MOV #-1, ORPWC 
004720 012777 000003 MOV JRPCS sWRITE 


FESHASLOIREGNE SVE VOR Le Bos Vai cK SSS IR REDRESS RRS 


006706 #3, ORP 
004726 012767 O60001 006670 MOV #814+B13+80, TPL 





ee re ee ee - _———— 


2 b—* b+ b= 2 bs b= fh pe po pepe Be 
Sa+ & 
0can) 


FU Ow Vous whe 


PRLSGL SSSR REDRESS oll Jonas orn eoeee 


b— ob = = bb b= = bo BB 2b = b= Bb Fb 0 bb BB bh bs Pb bb bb bb bh ho bp Bb bb bp Bb bh bs pe a pe o— P<p-- go 


fur ee 
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oe 


005070 


z 


HMM tettctcieictcieitcteieciots 
FSEVESSRSRVS TONS 


23 


c 


004767 


006622 
010000 


174306 
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006654 


174574 
174002 


006470 


1744S2 


006510 


CO6474 
173630 


006316 


006430 
006414 


006402 
006364 
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PC, T3P GENERATE 3 TIMING PULSES 
#912, aRPER :IS NXT SET? 


HLT sNXT SET ON LEGAL ADDR 


R RS, PRINTS -PRINT MESSAGE 
MES1O 
MOV EXP$. TTY 
JSR PC. PRINTR -TYPE LOCATION WITH LEADING ZEROS 
1S: i - #ERLS, LAD 
C s INCREMENT TRACK ADDR 


IN EXPS 
CMP #24 EXPS$ -TS ADDR STILL LEGAL? 
BNE ERLS «BRANCH IF YES 


;TEST SETTING OF NON-EXISTENT TRACK 


ERF6: JSR PC, CLRP :CLEAR THE CONTROLLER 

CLR IRPER 

MOVE  EXPS$, ARPDAL sLOAD TRACK ADDR 

MOV #-1. JRPWC 

MOV #3, JRPCS ; WRITE 

MOV 814+813+80, TPL : 

JSR PC. T3 sGENERATE 3 TIMING PULSES 

BIT #812, ORPER ‘DID NXT SET? “ere 

BNE 1$ 

HLT : ‘NXT DID NOT SET 

JSR RS, PRINTS ‘PRINT MESSAGE 

MES1O med 

MOV EXP, TTY 

JSR PC, PRINTR - TYPE LOCATION WITH LEADING ZEROS 
1S: BIT B14, ARPCS -DID HARD ERROR SET AFTER NXT? 

HLT a sHARD ERROR DID NOT SET AFTER NXT 
3S: BIT #B15, ARPCS ‘DID ERROR SET AFTER NXT? 

hy : sERROR DID NOT SET AFTER NXT 
23: HOV #ERF6,LAD 

INC EXP s INCREMENT TRACK ADDR. 

CMP #40. EXPS END OF PATTERN? 

BNE ERFG ‘BRANCH IF NO 
:NON-EXISTENT SECTOR SHOULD NOT SET WITH LEGAL SECTOR ADDRESSES 
ERF7: CLR JRPOA 

CLR EXPS STARTING SECTOR ADDR OF 0 
ERL7: JSR Pc, CLRP <CLEAR THE CONTROLLER 

CLR JRPER 

MOV EXPS. JRPDA sLOAD SECTOR ADDR 

MOV #-1, ORPWC 

MOV #3, JRPCS  sWRITE 

MOV #814+813+80, TPL 

JSR PC, T3P GENERATE 3 TIMING PULSES 


RP11C DISKLESS ad Says DR" 
OZRPAD.P ##RPER FUNCTION TEST### 


004000 
174002 
006214 
74046 
5200 
006172 
000012 
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006360 


174270 
173476 


006164 


006306. 

e7e 
006242 
006236 


174146 
006204 


006170 
173324 


006012 


06104 
006100 


006066 


1$: 
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#811, QRPER ‘DID NXS SET? 
SET ON LEGAL ADDR 

RS, PRINTS iPR NT MESSAGE 

EXPS, T 

pc BAINTR -TYPE LOCATION WITH LEADING ZEROS 

#ERL7 7, LAD 

EXPS :UPDATE SECTOR ADDR 

#12, EXPS -TS ADDR STILL LEGAL? 

ERL? ‘BRANCH IF YES 


; TEST SETTING OF NON-EXISTENT SECTOR 
Coy  SERF 10: 


JSR 
CLR 


PC CLRP -CLEAR THE CONTROLLER 
EXPS, ORPOA ‘LOAD SECTOR ADDR 
#3, JRPCS - WRITE 
88149813480, TPL * 
; GENERATE 3 TIMING PULSES 

#811, ORPER ‘DID NXS SET? 

"= sNXS§ DID NOT SET WITH ILLEGAL ADDR 
RS, PRINTS -PRINT MESSAGE 
EXPS. TTY 
PC, PRINTR : TYPE LOCATION WITH LEADING ZEROS 
B14, ARPCS sDID HARD ERROR SET AFTER NXS? 
: -HARD ERROR DID NOT SET AFTER NXS 
$615, aRPCS :DID ERROR SET AFTER NXS? 
ompekian sERROR DID NOT SET AFTER NXS 
EXPS sUPDATE ADDRESS 
#20, EXPS -TS PATTERN EXHAUSTED? 
ERF IO ‘BRANCH IF NO 


;TEST THE SETTING OF PROGRAM ERROR 


ERF Li: . 
006122: -. 


1$: 


CLR 


2S 
#814, RPCS 
33 


AS PCS Rat RITE 
og) 313460, TPL sGENERATE 3 TIMING PULSES 
#810, ORPER -DID PR ERROR CET? 


sPROGRAM ERROR DID NOT SET 


iM TH aa es Co, 


03 
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DZRPAD.P1! #eaRPER FUNCTION TEST&® 
1258 oossso 14ND HLT ‘HARD ERROR DID NOT SET 
1259 o065Se2 05 BR 2$ 
1g60 DOSS 777 100000 co60Se 3S: BIT #815, JRPCS :DID ERROR SET? 
1281 O05562 O01901 BNE zk 
H05E64 104490 HL ‘ERROR DID NOT SET 
126% OOSS&&- 012767 OOSH74Y 173206 26: MOV #ERF11,LAD 
Lees 905574 104000 SCOPE 
i867 sTEST SETTING OF MODE ERROR 
1269 OOSS7& 204767 005706 ERFl2: JSR PC. CLAP ‘CLEAR THE CONTROLLER 
1270 905802 905077 dob0e4 CLR JRPER 
le71 OOS6D6 O12777 177777 006024 MOV 8-1. SRPWC 
te7e OO0S614 eee 004903 06012 MOV #4003, aRPCS ;WRITE HEADER IN POP11 MODE 
1273 O0S6e2 812767 O60001 005774 MOV as4e813+80, TPL 
1274 005630 767 905726 JSR PC T3P :GENERATE 3 TIMING PULSES 
le7S 905634 -032777 990400 005770 BIT 088, JRPER ‘DID MODE ERROR SET? 
1876 005642 001002 BNE 
le?7 “4 490 HLT ts :MODE ERROR DID NOT SET 
1279 OOSESG 032777 O4000D oOOs7SE 1S: BIT #814, IRPCS sDID HARD ERROR SET? 
1280 O0S656 001002 | BNE 3$ 
1281 995660 104400 HLT - ‘HARD ERROR DID NOT SET 
iSe5. SpeEeS near 1oc00o +scs74e 3S: BIT #815, 9RPCS :DID ERROR SET 
1284 005672 001001 | BNE 23 ; 
18s. COS674 104400. HiT sERROR DID NOT SET 
1288 905676 012767 OOSS7E 173076 28: MOY sERF12,LAD 
lea? 005704 104000 SCOPE 
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1289 
.SBTTL ###RPCS FUNCTION TEST#*# 
;CHECK ABILITY OF THE ATTENTION FLAGS TO INTERRUPT 
los 012767 900001 OOSS70 CSFI: MOV #1, EXPS ‘STARTING TEST PATTERN 
1295 005714 908077 005740 2s: CLR M3 
Lee e737 000340 900256 NOV aPRIZ JUSTATUS iz. 
S33 Breese passes BpeeeD — JSR PCtLRP CLEAR 
S00 QOESHN 953777 Get008 BIS 8813, BRPC Ese TENTION. INTERRUPT 
i3a1 poeses | BIes77 Bpee ss Ov aH Rees ee at a oH Me 
1302 NOP sWAIT FOR INTERRUPT 
ee Bares ne 
1305 005766 012777 OO00340 . 172002 Nov ePRI7, OPSW s LOCKOUT pANTERRUPTS _ ENTION “a 
138 Reece Apace? 173262 | TSR RS, PRINTS sry SEC eAGE 
13s viteen Bt eseo 095474 173550 ae EXP, TTY 
1310 QOBD1E OON762 1? 2BR BC, PRINTR sTYPE LOCATION WITH LEADING ZEROS 
i euss 
1312 006020 012706 o90500 1S: MOV — a&STKPTR,SP sRESTORE STACK 
1313 006024 016777 O0S454 005576 MOV EXP$, JRPDS CLEAR ATTENTION BIT 
1318 906032 O3e777 o20000 005574 BIT 8813, ORPCS -DID AEI CLEAR? 
1316 Oo6042 104400 HLT : sATTENTION INTERRUPT ENABLE OID N 
3i8 | , ‘CLEAR WHEN ATTENTION BIT WAS SPARED 
1318 006944 15808 005714 172730 38: HOV #2$,LAD 
1320 ‘Bpepes 167 005424 ROL EXPS SHIFT TEST PATTERN 
1321 ' OO&D60 900400 o0S416 BIT #88, EXPS RN EXCEEDED? 
1328 O06066 001712 BEG 2$ H IF NO 
He 
1326 . TEST FOR TWO ATTENTION INTERRUPTS 
1327 006070 012737 000340 c002S& STAT: MOV ePRI7,a8STATUS 
1328 006076 012737 006150 O000eS4 MOV 41S, SBVECTOR 
1329 006104 904767 005400 JSR :CLEAR THE CONTROLLER 
1330 06110 177776 CLR ze .  * LOWER PRO ESSOR PRIORITY 
1331 006114 p20000 90ss12 BIS a8 3, 9R6CS ‘ENABLE ATTENTION INTERRUPT 
1332 O06le2 O1 000003 005524 MOV :SET ATTENTION BITS 
1333 906130 Ba840 NOP 
133¢ $06 138 “Bppsap NOP : 
000340 17777 MOV ePRI7, JePSW sRAISE PROCESSOR PRIORITY 
1337 Spee ° tides HLT — RPI TE DID NO OT INTERRUPT WITH ATTENTION 
i335 006146 000424 we BR sesh snet . 
1340 Spe ise Ole o00s00 13: MOY aSTKPTR, SP sRESTORE STACK 
i342 Qoeles Q0037 177 OY Beg, gevELTOR 
1343 OO6166 020000 o0S440 BIS #813, ARPCS sENABLE ATTENTION INTERRUPT 
1344 906174 012777 000001 005426 MOV #1, RPDS :CLEAR ATTENTION BIT ZERO 
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RHERPCS FUNCTION TEST#H# 


ose 
eck 


aa 


. 


BREA 


~OO-O 
bb 


F 
8 


o~ 
~~ 
rT 


SS 


By : 


a 


—-Ooo~—-co 
ue 
38 


ass 


000340 


006070 


177776 


172550 


000254 
00S3e4 


NUP | 
nF 
ePRI7, JePSW sRAISE PROCESSOR PRIORITY 

HUY RO PR TION EFF 1 DID NOT INTERRUPT 
23: MOV sSTKPTR SP ‘RESTORE THE STACK 

MOV - aTSTAT,L 

SCOPE | . 
-TEST INTERRUPT ON READY 
CSFe: RESET 

MOV 82$,28VECTOR ;RETURN VECTOR 

MOV ePRIl. aePSW SALLOW INTERRUPTS 

BIS #66, RPCS ENABLE INTERRUPT ON READY 

| Ne : 

MOV ePRI7, JePSiW ‘LOCKOUT INTERRUPTS 

HLT 3 =NO READY INTERRUPT 
es: MOV eSTKPTR, SP 

MOV sCSF2,LAD 

SCOPE 
sCHECK THAT INTERRUPTS DON’T OCCUR WITHOUT INTERRUPT ENABLES 
CSF3: SET | ae 

ote #1$,d8VECTOR |; INTERRUPT VECTOR 

MOVE 8377. ARPM2 -SET ATTENTION BITS 

CLR aePSw sALL OW TNTERRUP S AND 

, WAIT AWHILE 

te 

HOV PR17,a s LOCKOUT “INT TS 
18: MOV sSTKPTR, SP ; RESTORE THE STACK 

HLT : INTERRUPT RECEIVED WITHOUT 
2s: MOV eCSF3,LAD :ANY CONTROLLER ENABLES 

SCOPE 
sTEST INTERRUPT AT PRIORITY LEVEL 2 
CSF4: JSR PC, CLAP sCLEAR THE CONTROLLER 

MOV a1$, SeVECTOR ‘SETUP TRAP VECTOR 

BIS #86. IRPCS ‘ENABLE RF11 INTERRUPT 

MOV ePRi2, aePSW *LOWER PROCESSOR PRIORITY 

NOP 

NOP 

NOP 

MOY ePRI7, JaPSW 

HLT :NO READY INTERRUPT AT PRIORITY 2 
1$: MOV eSTKPTR, SP | 

MOV SF4, LAD 

SCOPE 
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1401 
1408 :TEST INTERRUPT AT PRIORITY LEVEL 3 
14 7 CSFS: JSR 
14 ppeuee ie ? naeatt 000254 MOV are. CS RVECTOR Pat TifeRRuer VECTOR 
405 O06462 052777 000100 O05144 BIS #86. IRPCS ‘ENABLE READY INTERRUPT 
12737 O00140 177776 NOY ePRI3, aePSW + OWER E OROCESSOR LEVEL 
Se 
012737 000340 177776 MOV #PRI7, 2ePSW 
i HLT -NO_ INTERRUPT AT LEVEL 3 
l o00s00 1S: MOV eSTKPTR. SP ‘RESTORE STACK 
012767 OO64S0 172254 MOV #CSFS,LAD 
104000 SCOPE 
:TEST INTERRUPT AT PRIORITY LEVEL 4 
004767 904754 CSF: JSR 
O01 006574 MOV aC n/8, SAVECTOR Fait ThTeRRUP RRUPT VECTOR 
900100 005064 BIS Y INTERRUPT 
012737 000200 177776 NOY sats, aaPSi *LOWER PROCESS 
012737 000340 177776 MOV #PRI7, JePSW 
104400 HLT :NO READY INTERRUPT AT LEVEL 4 
l o00s00 1S: - gSTKPTR, SP ‘RESTORE STACK 
012767 006530 172174 MOV  aCSF6,LAD 
104000 SCOPE 
-TEST THAT PRIORITY LEVEL S LOCKS OUT INTERRUPTS 
004767 004674 CSF7: JSR PC, CLRP >CLEAR RF11 
012737 006654 000254 MOV #1$ SavECTOR ; SETUP INTERRUPT VECTOR 
Bisa? OOue4O 177776 Boy CNPRES Dee SPO ER IORI TY LEVEL Toe. 
l l MOV ePRIS, JePSW T PRIORITY LEVEL TO S 
000240 NOP 
J00e4C NOP 
M0e4C NOP 
012737 O00340 177776 HOV #PRI7, dePSW 
o00s00 1S: MOV eSTKPTR, SP sRESTORE STACK 
HLT ‘INTERRUPT RECEIVED AT PRIORITY LEVEL 5 
006610 172112 2S: HOV #CSF7,LAD 


sTEST THAT PRIORITY LEVEL 6 LOCKS OUT INTERRUPTS 


aa 
109080 
Bizrs7 poeras oooesy “oS” aig sevector  /TRAP VECTOR 


890300 97956 Pate aaPsu oe te TAVEL TO 6 : 





SStSneu 
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V #PRI7, dePSW 


1§: MOV SSTKPTR, SP sRESTORE STACK 
HLT “INTERRUPT RECEIVED AT LEVEL 6 
es: 1 a #CSF10,LAD 


;TEST THAT PRIORITY LEVEL 7 LOCKS OUT INTERRUPTS 


CSFli: JSR 
; NOY nis, SVECTOR na Prato INTERRUPT 

BIS NABLE READY INTERRUPT 

NOP 

NOP 

NOP 

BR 2$ ) 
1S: MOV eSTKPTR, SP 

HLT , - INTERRUPT RECEIVED AT LEVEL 7 
25: - -MOV #CSF11,LAD 

SCOPE 3 
: TEST THE CLEARING AND SETTING. OF READY (RPCS-B7) 
CSF12: JSR PC, CLRP -CLEAR RF11 

"MOV JRPCS : ISSUE WRITE 

TSTB 3,08 31 READY 

BPL 1S | i 

HL oi READY DID NOT CLEAR WITH GO H 
1$: MOV #814+B813+80, TPL 

I5R pC 13? sGENERATE 3 TIMING PULSES 

iste gRPC ‘DID READY SET? . 

HLT sREADY DID NOT SET AT END OF OPERATION 
25: NOV : sCSF12,LAD } 
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I 

DZRPAD.P11 ##%SUCA FUNCTION TEST#H# 

tie : noe -SBTTL ###SUCA FUNCTION TEST### 

Mya? Sorice | Gobe? a. ae TART TEST ea ERN AT O 

1386 607185 abi7e7 rake cali:  S8R FccLRP REAR THE CONTROLLER 

14 7lle 116 004536 MOVB = EXP$. ORPM21 *LOAD MAINT CYLINDER ADDR 

1500 007120 7767 pows40 004360 MOV OSUCR RECS GBT DISK CYLINDER ADDR 

1501 71e ? 004352 CMP XPS, RECS -TS SUCA CORRECT? 

1508 0071 140) . BEQ 1$ 

1503 007136 104401 HLT +1 sSUCA INCORRECT 

1505 007140 012767 007106 171634 1S: MOV #CAL1,LAD 

1506 007146 104000 SCOPE 

1507 007150 ? 004330 INC EXPS “UPDATE CYLINDER ADDR. 

1508 007154 767 OOO400 004322 BIT #88, EXPS Is PATTERN EXCEEDED? 

1503 007162 001751 BEQ CAL! 2 :BRANCH IF NO 
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fal -SBTTL ###RPDA FUNCTION TEST### 
DAF 1: ‘ PC, RP sCLEAR RF11 
JSR PC’ INDEXP sGENERATE 1 INDEX PULSE 








;GENERATE 1 SECTOR PULSE 





ane 
pee 


sFORCE SOT TO COUNT OF 1 







MOV #1,R0 

ne PC, INDEXP -GENERATE 1 INDEX PULSE 
#88. sCLEAR SOT 

MOV JRPDA, RO 

ROR 

ROR 

ROR 

ROR 


sCLEAR UNWANTED BITS 
;WAS SOT CLEARED? 


OM ;SOT DID NOT CLEAR WITH INDEX PULSE 


b12767 007164 171472 1S: 1 a 
Bosoe? 
012700 





Ram 
OH409 
SBtssse 
™“ 
N 
." 
3 


: 
: 


;TEST ABILITY OF SOT TO COUNT 


Per erin aaa aa adtaaL ai dt aoe 


i 
© 


| bo b+ Bs & © BB BF 2 2 bo & D8 Bh bf po hb he = Po Be 0 Be Po B= Ps f-—> Pn Be 


1 DAF2: JSR PC, CLRP -CLEAR RPi1 
poates LR EXPS - EXPECT AE TING ADDR OF 0 
oo000i Ce MOV #1,RO 
JSR PC’ INDEXP - sGENERATE ONE INDEX PULSE 
320 2s: BIS 088, aRPNS <GENERATE ONE SECTOR PULSE 
| 12 C 
17767 O04 132 MOV JRPDA, RECS <GET SOT 
066067 004126 ROR RECS 
? Out ROR REC ree 
? 11 ROR C 
ere ree ate nat, cS CLEAR TED BITS 
2 Boece? BovOre bOMOre Rae OEXPS RECS STS CONTENTS OF SOT CORRECT? 
oS 001401 BEQ 1$ 
c52 LO4NOL HLT +1 -CONTENTS OF SOT INCORRECT 
5o3 12767 007312 171360 1S MOV #DAF2,LAD 
oc 104000 SCOPE 
cos 004054 INC 3 sUPDATE TEST ADDR 
o56 BeSSe9 000012 OO4046 CMP #12, EXPS$ =ADDR EXHAUSTED? 
597 001335 BNE 2g ‘BRANCH IF NO 


. -o—--—- ee * a —_«< - 
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TEST #2% 


003674 


003656 


003642 
00400e 


~SBTTL ### SILO MEMORY TEST ### 
s THIS mie Tey oe 1 z+? MEMORY _IN MAINTENANCE 


DATA IS OUTPUT TO REGISTER 
OEP WHICH 1H Is THE sit O’MEMORY. AFTER THE DATA FILTERS 
: THRU THE NENOR OUTREADY GOES TRUE. THE DATA IS READ 
“BACK AND COMPARED. 
SILO: MOV #-20, RY - SET UP ITERATION COUNT FOR SILO TEST © 
SILOR: JSR PC, CLRP ‘iiat : 
MOV #1,EXPS N Pate Flo NG ONE PATTERN 
CLR TTERN FLOG 
1S: RESET 
BIT #811, IRPML Bg ANREROY ger 
6$ H IF 
HLT = <SILO INREADY IS NOT SET AFTER CLEAR 
6$: = MOV EXPS. JRPSO sLOAD DATA IN SILO 
MOV #60,R1 <WAIT FOR OUT READY TO SET 
gs: DEC RI 
BNE 95 
2$ BIT #812, IRPM1 :IS OUTREADY SET? 
BNE 7§ ‘BRANCH IF SET 
HL a *SILO OUTREADY IS NOT SET 
7§: MOV JRPSO, RECS :GET DATA BACK FROM SILO 
CHP EXPS, RECS -TS DATA CORRECT? 
HLT +3 sDATA READ FROM SILO INCORRECT 
3S: MOV #15, LAD 
SCOPE 
TST RO SARE WE FLOATING A ONE? 
BNE 4§ ‘BRANCH IF NO 
ROL EXPS sROTATE PATTERN 
BCs =3 ‘BRANCH IF PATTERN EXCEEDED 
SS: MOV Tl T PATTERN FLAG 
HOV #0 ,EXPS : FLOATING ZERO PATTERN 
43° CLC 
BSR E . SHIFT FLOATING ZERO 
es #815, EXPS 
‘ENSURE. THAT THE SILO MEMORY CAN HOLD 64 DI 64 DISCREET NUMBERS 
ols isa blentie te Heats Par": THES SE ten 
SHOULD SLED TING of OE NTA RS OF J fies 160 OCTAL. AT 






sTHIS TIME OUT READY SHOULD C 


SILO1: JSR PC, CLRP a THE RPLIC 
MOV EXPS sINITIAL TEST PATTERN 

1S: grr sell, IRPM1 ; INRE Y SET? 
HLT es *SILO INREADY SHOULD BE SET 
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OZRPAD. ### SILO MEMORY TEST # 


; 
o 






1615 : 016777 003622 003776 2S: MOV EXPS, URPSO _ s LOAD PATTERN. IN SILO 
i613 D07670 Dee ? BpaT aL 003606 i #191, EXPS ie E Silo FULL’ 

l 004000 003744 BI #811, RPM! ; Y BEAR? 

l o1N0e Q ? F YE 

1 007710 l HLT as : SILO INRERDY D DID D NOT CLEAR 
PSS rst Bros 000001 o03Sb2 7S: MOV #1, EXPS eset Bart Patten 

1624 007722 936777 010000 003722 65: BIT able, aRPI Y 3eT? 

1e52 BOsese | TOMNOD AT gene Op a SHOULD BE SET 
ie farre BE? onweo ome ws: fy Seger r 

1629 ra (b2 003534 003534 ~~ CMP XPS, RECS 1s bate Comet? 

tear oO ae 33 ) STNCORRECT BATA RECEIVED FROM SILO 
BB fre Henn sR 

l 007760. 003520 SS: INC EXPS sUPDATE EXPECTED PATTERN 
1634 007764 Oe 7? 000101 003512 CMP #101, EXPS sHAVE G+ WORDS BEEN READ - 
1635 I BNE 6S ; BRANC 

163% O07774 010000 003650 BIT #812, ORPML ; HAS cL. OUTREADY CLEARED 
1638 10007 TO44O ALT tet O SHOULD BE EMPTY BUT 
1639 sOUTREADY IS STILL SET 

1640 010006 012767 007630 170766 2S: MOV #SILO1,LAD 

1641 010014 104000 SCOPE 

1642 010016 DOSe04 INc RY s INCREMENT ITERATION COUNT 
bua 51 DDS 000167 77416 JMP SILOR ‘LOOP 20 TIMES 

1646 -TEST THE OPERATION OF A SEEK COMMAND IN MAINTENANCE MODE. 
1647 : ISSUE A SEEK COMMAND AND CHECK THE SETTING OF SET CYLINDER 
1648 RESET HEAD, SET HEAD, SEEK START AND CAR BITS O THRU 7. 

1649 -ALL THESE SIGNALS ARE FOUND ON BUS OUT CONTROL. 

1650 910026 o00005 SEEK: RESET * 

1652 Bia tate 003614 OO3446 108: $$ MOV JRPM1. RECS -GET CONTENTS OF RPMI 

1653 910040 042767 174000 O03440 BIC #174000,RECS § :CLEAR UNWANTED BITS 

1654 10046 001404 BEQ 1 ‘BRANCH IF RE 1S ZERO 
1655 01 005067 003430 CLR EXPS 

1656 010054 1044 HLT +3 -SOME BUS QUT SIGNALS TO THE 
1657 010056 BR 2§ *RPOS ARE SET AFTER RESET 
1658 O10060 O01 000376 o035S6 1S: MOV #376, RPCA “LOAD CYCL 376 INTO RPCA 
ies Hleee Biee an 

1661 -010072 Ol 000001 003544 MOV #1, IRCA 

1662 O10100 1120777 000017 OO3S4e 4S: MOVB # &1?, aRPDAL sh AP OR 

1ee4 010110 Olde bot ie Tad ie ples oie 

1665 010112 112777 000020 003530 MOVB = #20, 1 HI IT OF TRACK ADDR 
1666 B1126 018777 1 003506 3S: MOV #11 apes ety et ORGER rT 

1e68 O1015% Ols760 ooDDds NOV ile 

1669 10140 767 0034 JSR * TIMEP NERATE S TIMING PULSES 
1670 010144 017767 O03S502 003334 V M1, RECS T CONTROL LINER FROM RPM 


SE ee eee eee ee ao ——_— 
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BAC ae 


1701 .. 


BEIGE ERS 


a eo b+ Fa Hs he paw Pa g-< Bee b= b= b> Pb b= b— f—- bs DP hb Dp 2 Ps PP FH —< Ho P- = Hp 


ae Pe Bee Bm hs Fe b= BB Be be be Bae Fa fe 


SNNNNN NN 
bb bb be 
NOW WwMe-© 


1718 


i 


ne b~ b> f= PB — b= Fe 


SENSE IRONS — 


BB 
OF oe 


SRSeRREE SHoNS 


PREPEELE 
NeLVOTOT 


220 
229? 
ERY 


001403 
012767 


000600 
003300 


010032 


177400 


003304 
003300 


6S: 


9S: 


eS: 


SEEK1: 
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J 
NOP 


1577, Exes RECS 


3600, EXP$ 
EXPS, RECS 


#810482" EXP§ 
XPS, RECS 


+3 


#10$,LAD | 


RY 
SEEK] 
RY 


10$ 


ITORD EXPECTED VALUE OF RPHI 


;1S THIS FIRS} PASS 
sBRANCH IF Y 


tBROICH IF YES OF RPM1 CORRECT? 

ONTROL SET CYLINDER 
an fhe CONTENTS Or tae ROULD 
;BE ON THE BUS OUT 


| ETB ONTENT gL PEK De pt SES 


are. 2 oe on 


OF RPM CORRECT? 
BRANCH 


THE CON ROL” 2 IGNAL RESET HEAD 
;SHOULD BE ON THE BUS OUT LINES 


;GENERATE 4 CLOCK PULSES 
GET CONTENTS OF RPMI 

CLEAR UNWANTED 

sLOAD EXPECTED VALUE OF RPM1 
;1S THIS THE FIRST PASS 
BRANCH IF YES 


;ARE CONTENTS OF RPM1 CORRECT? 


; THE CONTROL SIGNAL SET HEAD AND 
; THE HEAD ADDRESS SHOULD BE ON 
THE BUS ouT LINES 


GENERATE 4 CLOCK PULSES 

;GET CONTENTS OF RPMI 

;CLEAR UNWANTED Bits 

;LOAD EXPECTED BITS 

sBRE CONTENTS OF RPM1 CORRECT? 


THE CONTROL SIGNAL SEEK START 
;SHOULD BE ON THE BUS OUT LINES 


;IS THIS FIRST PASS? 
;BRANCH IF NO . 


;MAKE SECOND PASS 


; ISSUE A RESTORE COMMAND AND CHECK THE GENERATION OF 
;THE SIGNAL RESTORE ON THE BUS OUT CONTROL LOGIC 


RESTOR: RESET 


3$: MOV 
BIC 


RPM RECS 


#174000, RECS 


;GET CONTENTS OF RPM 
: CLEAR UNWANTED BITS 


AE ag’ 6782) 


# SILO MEMORY TEST # 
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1727 0104S2 001404 BEQ 1$ ‘BRANCH IF RESULT IS YES 

1728 010454 005067 003024 CLR EXPS | 7 on 
1553 Bibues douse BR t«éRk Res mre a als RESET 
1731 O10%64 612777 oO00015 o03142e 1S: MOV #15. IRPCS 

17 108 04 MOV #4, 00 

17 l 2. JSR PC’ TIMEP sGENERATE 4 TIMING PULSES 

17 l 17767 OO3144 002776 MOV .  @RPM1.RECS <GET CONTROL LINES FROM RPMI 
1735 010510 042767 174000 002770 BIC #174000,RECS § :CLEAR UNWANTED BITS 

1736 O10516 912767 O02100 002760 MOV #B6+B10-EXP$ | :LOAD EXPECTED VALUE OF RPMI 
1737 010524 026767 002754 002754 CMP EXPS, RECS WERE CONTENTS OF RPMI CORRECT? 
1738 010532 901401 BEQ 2$ ‘BRANCH IF YES 

1739 010534 1044 HLT +3 ; ISSUED HOME COMMAND-EXPECTED 
174 ‘RESTORE AND CONTROL TO BE SET 
174] -ON BUS OUT LINES 

1742 010536 900005 25: RESET 

1743 O10540 012767 O10436 170234 MOV #3$, LAD 

17ua 10546 104000 SCOPE 

1746 s ISSUE A READ COMMAND WITH NO SEEK IMPLIED AND CHECK THE GENERATION 
174? -OF THE SIGNAL READ IN THE BUS OUT LOGIC 

1749 010550 READT: RESET 

1750 010552 012777 1 00 25: MOV #-1, IRPWC sLOAD WORD COUNT 

751 919560 1 900017 oO3046 MOV #17" JRPCS - ISSUE READ COMMAND 

1 10565 eee 000004 MOV 4, 

1753 010572 004767 002746 JSR TIMEP 

1754 010576 012767 O60401 003020 MOV 9514+813+B8+B0, TPL 

1755 010604 Ole? 990003 MOV #3, 

1756 010610 76 ? JSR PC’ TIMEP :GENERATE TIMING PULSE 

1787 010614 12767 060001 903002 NOV #814+813480, TPL oxi Coney’ @ pew 

1228 Bt DES Buo7e> reainit BOSE BIC #174000,RECS = ;CLE UMIANTED B BITS 

1760 010636 012767 OO2042 O02640 MOV SELQVBSIB1,EXPS {LORD EXPECTED VALUE OF RPMI 
1761 O10644 026767 002634 00263 CMP EXPS, RE -ARE CONTENTS OF RPMI CORRECT 
1762 010652 001401 BEQ ‘BRANCH IF YE 

1763 010654 104403 HLT +3 - ISSUED READ WITH NO SEEK COMMAND 
1764 -EXPECTED CONTROL SELECT HEAD, AND READ 
1765 *SIGNALS ON THE BUS OUT LINES 
1766 O10656 1S: RESET 

1767 010660 012767 oO10SS2 170114 MOV #2$,LAD 

1768 010666 000 SCOPE 

1770 - ISSUE A WRITE FORMAT COMMAND AND CHECK THE GENERATION OF THE 
771 WRITE SIGNAL IN THE BUS OUT LOGIC 

1773 010670 012777 177777 re WRITE: MOV a1 IRPWC ;SET UP WORD COUNT 

1774 010676 012777 O00001 00274 MOV -SELECT SE 

1775 010704 012777 014003 002722 MOV #14003. JRPCS § ;ISSUE WRITE FORMAT COMMAND 
1778 010712 012700 o0c023 MOV #23, RO. 

1777 010716 004767 OOe6e2 JSR PC, TIMEP sGENERATE 19 TIMING PULSES 
1778 010722 012700 Ooog00I OV 1; RO 

1779 010726 004767 O02640 JSR INDEXP sGENERATE INDEX PULSE 

1780 010732 O52 000400 002720 IS #88, JRPM3 «GENERATE SECTOR PULSE 

1781 010740 042777 400 002712 BIC #88, JRPM3 

1782 010746 052777 OOO400 002704 BIS #88, JRPM3 -GENERATE SECTOR PULSE 
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BPRPRD PT HEX SH MEMORY Hee REX 
1783 010754 012700 000003 NOV #3, RO aa ee es aad 
aia . 
ieee BIRR Bizse> Bosses oo2s14 noe OORONE RECs «= ee RON Fe Te OP Bente 
1786 010772 O4e767 174000 o002506 BIC #174000,REC$ _ :CLEAR UNWANTE 1S 
1787 011000 012767 002061 002476 MOV #810+854+84+80, EX -LOAD EXPECTED VALUE OF RPMI 
1788 O11006 626767 002472 002472 CMP XP§$, RECS sARE CONTENTS OF RPM1 CORRECT 
1789 011014 001401 SEQ ‘BRANCH IF vES 
1790 011016 104403 HLT +3 ‘ISSUED A WRITE FORMAT COMMAND 
179] ap “AND EXPECTED CONTROL, SELECT HEADS, ERASE, 
1792 ‘te “AND WRITE SIGNALS ON THE BUS OUT LOGIC 
1793 011020 o00005 13: RESET 
1794 011022 912767 010670 167752 MOV WRITE, LAD 
1795 011030 104 SCOPE 
1796 011032 005267 167742 INC ICNT s INCREMENT ITERATION COUNT 
1797 011036 Oe2767 OOD100 167734 CMP #100, ICNT <64 PASSES YET? 
1798 011044 O0140e BEQ 25 “BRANCH IF YES . 
1799 011046 000167 171304 IMP T 
1800 0110S2 005267 Od02540 25; INC PASSCT s INCREMENT PASS COUNT 
1801 011056 004567 17020e ap JSR RS, PRINTS ‘PRINT MESSAGE 
1802 O11062 O13666 MES1 
1803 O11064 O16767 002526 170470 MOV PASSCT, TTY 
1804 011072 004767 170260 JSR PC PRINTS sTYPE LOCATION-SUPRESS ZEROS 
1805 011076 O00167 171244 JMP LOOP ee 
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OZRPAD.P11 RHESWITCH TEST## 


1808 .SBTTL - *##*SWITCH TEST##% 

1808 , THIS Tt TEST IS 1SALLED WHEN IT 1§ DESIRE RED Tori “rite reer AND 

it ENR E- Piha iitcn HOULD be ENA tsb, OULD HAVE 

HE SPREE EOD SNE Mita WS ae te 

tis SSO Te Oe 

1815 011102 0912706 o00S500 SWTST: MOV uSTKPTR, SP sSETUP STACK 

1816 11105 004767 O0e214e2 i JSR PC, INIT INITIALIZE VECTORS 

1818 Olllle OO4S67 170146 JSR RS, PRINTS -PRINT MESSAGE 

1819 O11116 Ole2lle MES2O <GET NUMBER OF DRIVES 

1820 011120 004767 170560 JSR PC, READS : INPUT MESSA 

1821 011124 004767 170732 JSR PC’ PACKS “CONVERT INPUT TO A NUMBER 

1822 011130 005767 171200 TST NUMS -TS RESPONSE 0? 

1823 011134 001766 BEQ 1S ‘BRANCH IF YES 

1824 011136 162767 9000001 171170 SUB #1, NUMS 

1825 011144 O2e767 O00010 171162 CMP #10, NUMS :IS NUMBER TOO HIGH? 

1826 011152 101757 BLOS }3=s«1S ‘BRANCH IF YES 

1827 011154. 016767 171154 o02440 MOV NUMS, HUNIT -SAVE HIGHEST UNIT NO. 

1828 011162 ? 002432 CLR 

1829 O11166 S67 170072 JSR RS,PRINTS - :PRINT MESSAGE 

1830 011172 012170 MES2e2 

1831 011174 c$: | 

1832 011174 OO4S67 170064 JSR RS,PRINTS —°  ;PRINT MESSAGE 

1833. 011200 012147 : MES21 sHAVE DRIVE DISABLED 

1834 011202 016767 O02412 170352 MOV UNIT.TTY ~ - 

1835 011210 004767 170142 JSR PC, PRINTS ,- sTYPE LOCATION-SUPRESS ZEROS 
1836 011214 004767 170464 JSR PC’READS =. T 

1837 011220 012777 OO0001 o0e4o6 2S: MOV #1.dRPCS CLEAR THE CONTROLLER 

1838 011206 777 DOe402 MOVB UNIT, aRPCS1 Tete UNTT 

1839 011234 032777 36 BIT #814; JRPDS E UNIT ON LINE? 

1840 O11242 001402 BEQ 4§ 

1841 011244 104400 HLT ea fa SECTED PNG 50h LINE WITH THE 

1842 011246 O004eS BR téi@éS ® «. ISABLED 

1843 011250 4$: if 

1844 011250 O04S67 170010 JSR RS, PRINTS’. :PRINT MESSAGE 

1845 011254 012244 MES23 ‘HAVE DRIVE ENABLED 

1846 011256 016767 002336 170276 MOV UNIT, TTY 

1847 0112064 004767 1 JSR PC PRINTS ;TYPE LOCATION-SUPRESS ZEROS 

1848 011270 904 7? 170410 JSR 808 T 

1849 011274 T3585 002332 MOV pc CLEAR THE CONTROLLER 

1850 011302 116777 002312 002326 MOVB ty JRPCS1 *RESELECT THE UNIT 

1851 011310 032777 04 002312 BIT #814) JRPDS -IS THE UNIT ON LINE? 

1852 11316 001001 BNE 3$ 

1853 O11 104400 ie HLT sSELECTED UNIT i:0T ON LINE WITH 

1854 , ‘THE DRIVE ENABLED 

1855 011322 012767 011220 167452 3S: MOV #2$, LAD 

1856 O11 104000 SCOPE 

1857 011332 O26767 OOecbe 02262 CMP UNIT, HUNIT sHAVE ALL UNITS BEEN TESTED? 

1858 011340 001403 BEQ RDOSW ‘BRANCH IF YES 

1859 O11 3He Dosz6 002252 INC UNIT ‘UPDATE UNIT 

1860 O11 71 BR S$ 

1861 011350 Bbo00E RDSW: RESET 
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li BaaeSWITCH TESTaa# 
011352 005067 o0224e2 i CLR UNIT 
aE oh gee | oe tAUE READ ONLY SET 
B38 pteses 002230 170170 MOV UNIT, TTY 
1132 767 167; JSR PC, PRINTS s TYPE LOCATION-SUPRESS ZERCS 
11376 OO4767 } JSR PC; READS ‘INPUT MESSAGE 
11408 Ol2777 000001 oo2e24 3S: MOV #! gRECS ‘CLEAR THE CONTROLLER 
11410 116777 002204 O02220 © MOVB UNIT, aRPCS! -SELECT THE UNIT 
O1141&6 932777 002204 BIT #88, aRPOS -IS SELECTED UNIT WRITE PROTECTED 
611424 001908 NE 1$ 
611456 1044 HL --  sSELECTED UNIT WRITE PROTEST DID 
011430 900425 * QR 2s <NOT SET WITH READ ONLY SET 
114 167626 JSR RS, PRINTS :PRINT MESSAGE 
tee 12316 Ps MES2S : CLEAR REAR ONLY 
O1144O O16767 O02154 170114 ~ . MOV UNIT, TTY 
011446 004767 167704 JSR PC, PRINTS s TYPE LOCATION-SUPRESS ZEROS 
011452 904767 170226 JSR PC’ READS -T 
011456 012777 990001 002150 MOV 8! ¢ -CLEAR THE CONTROLLER 
11464 116777 130 902144 MOVB Sat? oRPcSi -RESELECT THE ‘UNI 
O1147e O32 000400 002130 BIT #88, dRPDS -1S SELECTED UNIT WRITE PROTECTED 
011500 OO1401 . BEQ 2s 
011502 aris HLT ‘SELECTED UNIT WRITE PROTECT SET 
:WITH DRIVE WRITE ENABLED 
911504 012767 O114C2 187270 2$: MOV #3$,LAD 7 
011512 104009 * “SCOPE 
611514 026767 o02100 002100 CMP UNIT, HUNIT *HAVE ALL DRIVES BEEN TESTED? 
011522 001403 BEQ 4 “BRANCH IF YE 
911524 005267 002070 INC UNIT : UPDATE UNIT 
11530 oOc0712 ag c 
011532 oc206e2 4S: CLR UNIT 


sTEST THE SETTING OF WRITE LOCKOUT AND THE BOUNDARY SWITCHES ON THE 
sRP11C CONTROL PANEL. 


pisiiciniiniaisieea RM Ue paenet a a ti dad 


pt tee Seat n2 ~— + #2,R0 NITIATE SWITCH PATTERN 
Bi teu BASES Eye Ta JSR RS; PRINTS SPRINT neSencE 
911550 012352 MES26 ‘HAVE WRITE LOCKOUT SET 
611552 ? 167506 JSR RS, PRINTS ‘PRINT MESSAGE 
11555 Detes MES27 
11560 767 170120 ISR PC READS s INPUT MESSAGE 
1156s D0s07? 002054 3S: CLR JRPCA 
11570 000400 002032 BIT 828, JRPOS -IS SELECTED UNIT WRITE PROTECT SET” 
tens TpaNo +e LECTED UNIT WRITE PROTECT SHOULD 
gies dea a ERMA 
11604 912777 po00de oo2032 1S: MOV . #2. 9RPCA ‘PUT A TWO IN RPC 
11618 e777 000400 o02010 BIT #28, ORPOS -1S SELECTED UNIT WRITE PROTECTED? 
Ollsee 104400 HLT -SELECTED UNIT WRITE PROTECT IS SET 
:WITH RPCA EQUAL TO TWO. 
11624 012767 O11S64 167150 2s: MOV 83$, LAD 
Ollese 104000 SCOPE 
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BEASWITCH TEST#ES | 7 


WRSW1: . . | 
167424 xe '  RS,PRINTS sPRINT MESSAGE 
S28 


? 
12472 - -SET CYLINDER SWITCHES 
O04567 17416 a RS, PRINTS :PRINT MESSAGE 
12571 : MES29 3 
— OS 
.” ROR RO 
l 167702 | MOV RO, TTY 
N04767? 167472 | ISR PC; PRINTS -TYPE LOCATION-SUPRESS ZEROS 
906 ROL 
BOs787 470010 JSR PC , READS » INPUT MESSAGE | 
100 1744 3S: MOV RO. JRPC $LOAD PATTERN INTO RPCA 
e772 O00H00 001722 BIT age, 0 Os PIS UNIT WRITE PROTECT SET? 
104400 : HLT ‘UNIT WRITE PROTECT IS NOT SET 
900410 : BR 2 $RPCR EQUALS CONTENTS OF BOUNDARY 
062777 o000002 001722 1S: ADD 82, IRPCA s INCREMENT CYLINDER ADDR 
036777 900400 001700 BIT #88, ORPOS IS UNIT WRITE PROTECT SET? 
oh, -UNIT WRITE PROTECT IS SET WITH 


-RPCA ATER THAN BOUNDARY 
Nee 


: : SWITC TINGS 
012767 O11674 167040 2S: MOV #3$,LAD 
meat | R RO sUPDATE TEST PATTERN 
001000 BI 9, RO -TS PATTERN EXCEEDED? 
001732 BEQ. 4§ ‘BRANCH IF NO 
Broe? ooooo: ooeze RB aL UNIT 
004557 167272 WER Re PRINTS -PRINT MESSAGE 
012603 | MES30 , “HAVE BOUNDARY SWITCHES CLEARED 
167264 SR RS, PRINTS ‘PRINT MESSAGE 
12641 i $31 | 
? 167256 : JSR RS, PRINTS SPRINT MESSAGE 
ptESeS 001604 167544 NOY OUNIT. TTY 
767 16 J BC PAINTS : TYPE LOCATION-SUPRESS ZEROS 
Brave? OpoBoS OO1GI0 2S OS RPE NOSE A> TN RPCA 
Gae777 06 01566 BIT #86, 0RPOS TS UNIT RITE PROTECT SET? 
04400 Se Me eee sUNIT WRITE PROTECT SHOULD BE SET 
= SRRCA CONTAINS A TH AND 
: SELECTED UNIT IS ZERO 
012767 012026 166726 1S: HOV #2$, LAD : 
ie? 001534 UNIT :SHIFT UNIT PATTERN 
032767 O00010 001526 BIT #83, UNIT -HAS PATTERN BEEN EXCEEDED? 
001743 , BEQ 3$ 
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REESWITCH TESTR#® 
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(15><12>/PLACE THE FOLLOWING VALUES IN THE CYLINDER SOUNDRY SWITCHES: / 


1S11 MES2!: 
MES2e: 
MES26 ASCIZ 
MES27: .ASCIZ 
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ip 
000 


Fe 
O > 
: : 
z. ; ~ 
= J 
% = s 
; =z 
> - ~ ce a 
= ~ tel aw = 
2. _ = 5 2 = 
5 o w a ‘a = 
4 , ua oO + rd 
cE Ep ~~ ey? ‘yee > a uw 
=< 
i 2 w FZ ee Zz S m= 
—~—<— ~-s —~ > #F# 
ee x= o° -~ Ss 2 — = 
=~ “Ee oi ra Z 
in Ww . & rd 4 wn 
~J tap tisédhas) a 
on Ss / = ox = G 
hg Ea eS. 86. = 
a & <x ee ea x x x 
ea «(Co nm in nm nw in in in 
Be = son - - — 
y 9 SOS 3 OS eS 
SwNE & a © 2 2 
if a 
uw 
a x? 
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iat 


OS1S1& MeS29: 


MES30: 


OS MES31: 
14 


38 
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ca 
Sus 


MES32: 


MES33: 
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~ASCIZ 
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€15><12>/INSERT / 
(15><12>/CLEAR THE BOUNDARY SWITCHES/ 


(15><12@>/SET FOLLOWING VALUE IN THE DRIVE BOUNDARY SWITCHES/ 


(15><le>/TEST COMPLETE/ 


(15><12>/RESET WRITE LOCKOUT.... THANK YOU/ 
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OZRPAD . P ### SUBROUTINES # 





g06e .SBTTL ##% SUBROUTINES ### 
4 ‘FLOAT A ONE AND ZERO THRU A DESIGNATED REGISTER 
013C1e2 BITST: MOV (RS) +, MASK ;FETCH DATA MASK 
2067 O13016 MOV (R5)+.R4 <GET REGISTER UNDER TEST 
| ee ME hoes 
l “4: IF 
l MOV sal, : INI aL l2 E DATA TTERN 
07 l BTLI: JSR PC, BTL2 _ OUTPUT DATING ZE 
ISR PC’ BTL : OUTPUT FLOAT NG SRE 
l ROL R3 -SHIFT PATTERN 
2075 TS RS 
soe bt RYE RS | 
2078 013056 TLe: COM. R3 sCOMPLIMENT PATTERN 
2079 013060 BTL3: MOV R3, EXPS - 
2080 013064 COM MASK sAND MASK WITH PATTERN 
2081 Ol BIC MASK , EXPS 
SoBe l COM MASK 
2083 013106 MOV EXPS§, (R4) -OUTPUT TO REGISTER 
2084 13108 MOV (RY) /RECS : INPUT FROM REGISTER 
208s 01311 COM MASK . 
e086 13116 BIC MASK, RECS sAND MASK AND RECEIVED DATA 
13124 COM MASK 
2088 013130 CMP XPS, RECS :IS DATA CORRECT 
2089 013136 BEQ The 
2030 613140 ERR :GO REPORT THE ERROR 
2091 013144 BTN2:~ MOV #8TL3, LAD 
2092 013152 SCOPE 
e033 013154 RTS PC 
s035 ;RAPID DATA TEST FOR W.C. AND B.A. REGISTERS 
2097 013156 01250 (RS)+,R SS_IN NR 
2098 aL 366 O18) oco44e2 -(RS)+! Tear cy ERROR OR RETURN 6 
2099 013164 ? — (R5)¢+ 
2100 013166 12737 013234 ood004 #2$, JBERRVEC at FOR REND 
2101 0131 RO D IEHORY Rae LOCATION 
ie 0131 1011 (RO), (RL) 3 HF EMORY TO REGISTER 
2103 Ol 11 (R1); (RO)+ *TEST FOR PROPER VALUE IN REGISTER 
side ofseod ordee? 000274 1520). EXPS EXP$ FOR TYPOUT - 
2106 eae Bt Te? (R1), RECS nove REGISTER OF DATA TO REC$ FOR ERROR TYPOUT 
2107 013214 004777 900406 PC, aLERR 7 
108 013220 012767 013176 165554 #1$, LAD REPS SOP ADDRESS FOR SCOPE 
109 013025 1 | 
e110 013630 005760 (RO)+ ‘NO LOOP CONTINUE TEST 
ity 13232 j 1$ 
elle 013234 Decbet (SP)+, (SP)+ “CLEAN OFF STACK 
2113 013236 012737 OO0006 OD0004 . #ERRVEC +2 JBERRVEC sRESTORE TRAP CATCHER 
e114 O14 000340 177776. V #PRI7, JePSil RES TORE NO. NO INT ERUPTS 
gis 13252 RTS- RS TO 
2117 INITALIZE TRAP VECTORS AND LOCKOUT TRAPS 
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% SUBROUTINES # 
att Thee 012767 OO0llle 
2120 012767 000340 
oa 
1 TRE: 000207 
3314 pares 000002 
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#ERROR, 34 


tet 20 


#PRI7, aePSH 
PC . 


; TYPE ERROR MESSAGES. 


165720 


MSG: 


es: 


1$: 


BIT 


Ooo Da 


#81,HLTCTS 
»PRINTS 

RS, PRINTS 

BC PR TTY 


tNTR 
RS, PRINTS 


“@RPER, TTY 


PC, PRINTR 
RS;PRINTS . 
DRPCS, TTY 
PC, PRINTR 
480, HLTCTS 
ge 
#81,HLTCTS 
RS, PRINTS 


EXP$, TTY 
PC, PRINTR 
RS, PRINTS 


RECS, TTY 
BC, PRINTR 


,SETUP TRAP VECTOR 
;SETUP ENT VECTOR 
sLOCKOUT INTERRUPTS 


; TYPE ENTIRE MESSAGE” 


BRIN dst 


;PRINT MESSAGE 


s TYPE LOCATION WITH LEADING ZEROS 
*PRINT MESSAGE 


;TYPE LOCATION WITH LEADING ZEROS 
sPRINT MESSAGE 


TION WITH LEADING ZEROS 
EXPECTED RECEIVED? 


sPRINT MESSAGE 
;PRINT MESSAGE . 


sTYPE LOCATION WITH LEADING ZEROS 
sPRINT MESSAGE 


;TYPE LOCATION WITH LEADING ZEROS 


‘ROUTINE TO CLEAR THE RP1IC IN MAINT MODE 


CLRP: 


$1 DRPC 
salve813+B0, TPL 


0613, oP 


TIME PULSES 
LINE 


iSET UNIT 


HOY 








= oO 
- e8 
~ » & 
owt Bote ; 
Sena 8 
i be EEE 
& gs 4 Ee Ea geass 
225 8 Sf ww g a 
2 2 fea we i eC ee52 > ee gen ge fee 
5 £ - Se ON Sane 
£ S pee eae 222 
a S é a rf . SRE eceRncecae aaieS : eC é ‘ % is 
= 8 § 88 efescustesereeeieeees © PE EE 
fg 2 24 8 9 8 on 
a = aioe ie 
; § & GE 
-4 oo 
Saedereen 
i: SS 
a eevevwewewheeetit ets MEME MSSNSGUS eS 
uP. alelalsfalalalafatalalatalalotatatetatete) ratalefalatalal=*alalals) 











Seen te Re lean Kame Keo Meaeh Kame Kaun Kem Ram Rate Kaen Rae Ram Reon Re Rone oe oe ee ee ee ee 
eer Darah svlar ative ablavicviavighisVigvighisviaviatiaviatiatlaliatiaty 


ER EREE SSUES RS RANE ARE RE RANA EMRE BES NTS" SOREN ER 


RP11C D 
OZRPAD 





= 
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